home *** CD-ROM | disk | FTP | other *** search
/ Mobiclic 71 / MOBICLIC 71.ISO / mac / DATA / COMMUN / temp0001 / 00263_Script_GESTION_BTON_FERMETURE_ENCADRE < prev    next >
Text File  |  2004-12-05  |  1KB  |  47 lines

  1. property p_cettePiste, p_Nodepiste,p_nom_Acteur,p_retour
  2. ----------------------------------
  3. on getPropertyDescriptionList
  4.   return [#p_retour:[#comment:"label de retour",#format: #string,#default:"no_change"]]
  5. end getPropertyDescriptionList
  6. --------------------------------
  7. on beginsprite me
  8.   p_Nodepiste = me.spriteNum
  9.   p_cettePiste = sprite(p_Nodepiste)
  10.   p_nom_Acteur = p_cettePiste.member.name
  11. end
  12. ----------------------------------- 
  13. on mouseEnter
  14.   if the pauseState = 1 then exit
  15.   cursor 280
  16.   p_cettePiste. member = p_nom_Acteur&"_R"
  17.   updateStage
  18. end
  19. ----------------------------------- 
  20. on mouseWithin
  21.   if the pauseState = 1 then exit
  22.   cursor 280
  23. end
  24. ---------------------------------
  25. on mouseLeave
  26.   if the pauseState = 1 then exit
  27.   cursor -1
  28.   puppetsprite  p_Nodepiste , FALSE
  29. end
  30. ----------------------------------- 
  31. on mouseUp
  32.   if the pauseState = 1 then exit
  33.   cursor -1
  34.   window("ENCADRE_TEMP").close()
  35.   window("ENCADRE_TEMP").forget()
  36.   tell the stage
  37.     niveauSon()
  38.     case(p_retour) of
  39.       "no_change":
  40.         go the frame--pour dΘbloquer la pause
  41.       otherwise:
  42.         go p_retour
  43.     end case
  44.   end tell
  45. end
  46. ----------------------------------- 
  47.